function [discount,beca,stipend] = u44_2010(math,lang,private,price,ref)
%% Universidad del Desarrollo
lm=(math+lang)/2;
stipend=zeros(size(lm,1),1);

%Beca socioeconomica
beca=(price-ref)*((lm>=475).*(private==0));

%Beca socioeconomica sobre 700
discount=((lm>=700).*(private==0));

end
